como imprimir la diagonal principal de una matriz en pseint